home *** CD-ROM | disk | FTP | other *** search
/ The Original Shareware 1.1 / The Original Shareware (WeMake CDs)(Volume 1.1)(CDs, Inc)(1993).iso / 15 / marylamb.zip / TESTER.C < prev    next >
C/C++ Source or Header  |  1986-01-03  |  1KB  |  57 lines
  1. #include "windows.h"
  2. #include "tunes.h"
  3.  
  4. NOTES notes[] =
  5.     {
  6.     OPENSOUND,
  7.     SETVOICEACCENT,1,100,0xffff,S_NORMAL,0,
  8.     SETVOICEQUEUESIZE,1,1000,
  9.     1, 44, 8, 0,
  10.     1, 42, 8, 0,
  11.     1, 40, 8, 0,
  12.     1, 42, 8, 0,
  13.     SETVOICEACCENT,1,100,0xffff,S_STACCATO,0,
  14.     1, 44, 8, 0,
  15.     1, 44, 8, 0,
  16.     1, 44, 4, 0,
  17.     1, 42, 8, 0,
  18.     1, 42, 8, 0,
  19.     1, 42, 4, 0,
  20.     STARTSOUND,
  21.     WAITSOUNDSTATE,QUEUEEMPTY,
  22.     SYNCALLVOICES,
  23.     1, 44, 8, 0,
  24.     1, 47, 8, 0,
  25.     1, 47, 4, 0,
  26.     SETVOICEACCENT,1,100,0xffff,S_NORMAL,0,
  27.     1, 44, 8, 0,
  28.     1, 42, 8, 0,
  29.     1, 40, 8, 0,
  30.     1, 42, 8, 0,
  31.     1, 44, 8, 0,
  32.     1, 44, 8, 0,
  33.     1, 44, 8, 0,
  34.     SETVOICEACCENT,1,100,0xffff,S_STACCATO,0,
  35.     1, 44, 8, 0,
  36.     1, 42, 8, 0,
  37.     1, 42, 8, 0,
  38.     1, 44, 8, 0,
  39.     1, 42, 8, 0,
  40.     1, 40, 2, 0,
  41.     STARTSOUND,
  42.     WAITSOUNDSTATE,QUEUEEMPTY,
  43.     CLOSESOUND,
  44.     STOPSOUND
  45.     };
  46.  
  47. extern far pascal PlayMusic();
  48.  
  49. int PASCAL WinMain( hInstance,    hPrev, lpszCmdLine, cmdShow )
  50. HANDLE hInstance, hPrev;
  51. LPSTR  lpszCmdLine;
  52. int    cmdShow;
  53. {
  54.     PlayMusic( (LPTUNES)notes );
  55.     exit( 0 );
  56. }
  57.